home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1988 October / Ahoy_Magazine_88-10_1988_Double_L.d64 / Lock Up (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  485b  |  11 lines
  1. 10 rem lock up locator
  2. 20 forx=53199to53247:reada:b=b+a:pokex,a:next
  3. 30 ifb<>6795thenprint"error in data. try again.":end
  4. 40 print"[147] **** lock up locator installed   ****"
  5. 50 print" **** sys 53199 to activate,      ****"
  6. 60 print" **** press '_' to trigger, and   ****"
  7. 70 print" **** sys 53236 for a report.     ****"
  8. 80 data 120,169,207,141,21,3,169,220,141,20,3,88,96,165,197,201,57,240,3,76
  9. 90 data 49,234,104,104,104,104,104,141,254,207,104,141,255,207,76,226,252,173
  10. 100 data 255,207,174,254,207,32,205,189,96,0,0
  11.